home *** CD-ROM | disk | FTP | other *** search
/ The Trig Explorer / The Trig Explorer.iso / mac / Explorer / Ex_Pi.dxr / 00039.ls < prev    next >
Encoding:
Text File  |  1998-07-22  |  535 b   |  17 lines

  1. on enterFrame
  2.   global Deg, rad
  3.   set Deg to random(1440) - 720
  4.   set the floatPrecision to 5
  5.   set rad to float(float(Deg) * PI / 180.0)
  6.   set the floatPrecision to 2
  7.   put Deg into field "Degree"
  8.   put rad into field "Radian"
  9.   put " " into field "Answer"
  10.   set the textSize of field "Answer" to 32
  11.   set the textSize of field "Degree" to 32
  12.   set the textSize of field "Radian" to 32
  13.   set the textStyle of field "Answer" to "bold"
  14.   set the textStyle of field "Degree" to "bold"
  15.   set the textStyle of field "Radian" to "bold"
  16. end
  17.